home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 2 / BBS in a box - Trilogy II.iso / Files / Hyper / U-Z / WindowScript™.Demo / WindowScript™ 1.0 Working Model / WindowScript™ 1.0 Working Model.rsrc / ljb_143_wsToolsBW < prev    next >
Encoding:
Text File  |  1992-04-29  |  608 b   |  30 lines
  1. ItemType: WIND
  2. Rect: 240,188,308,317
  3. Style: Windoid
  4. HasTitleBar: FALSE
  5. HasCloseBox: TRUE
  6. HasZoomBox: FALSE
  7. HasGrowBox: FALSE
  8. MinSize: 60,50
  9. MaxSize: 865,597
  10. Name: wsToolsBW
  11. Visible: FALSE
  12. Script: global ptVis¬if objValue = "CloseBox" then¬hide window wdName¬put false into ptVis¬return "NG"¬end if
  13.  
  14. ItemType: PICT
  15. Rect: 0,0,68,20
  16. Name: CursorToolsBW
  17. Grid: 3,1
  18. Logic: Radio
  19. Script: if objValue = 1¬then ChooseTool "PLAY"¬else ChooseTool "SELECT"
  20.  
  21. ItemType: PICT
  22. Rect: 0,20,68,25
  23. Name: ToolsDividerBW
  24.  
  25. ItemType: PICT
  26. Rect: 0,25,68,129
  27. Name: ItemToolsBW
  28. Grid: 3,5
  29. Logic: Radio
  30. Script: ChooseTool (objValue + 3)